|
CATIA V5 Programmierung : Dicker Block, Parameter ändern
theshadog am 23.03.2009 um 13:15 Uhr (0)
Falls mal jemand das Problem hat:Ich lese mir jetzt die Teilenummer aus und bekomme so ein Code:Set p = parametersThickThin1.Item(teilenummer + "LeiterbahnenLeiterbahnenPadThickThin1")Klappt wunderbar.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Wiederholung der Punkt- und Ebenenerzeugung
theshadog am 24.04.2009 um 12:07 Uhr (0)
Hi Leute,also ich würde gerne die "Wiederholung der Punkt- und Ebenenerzeugung" im Wireframe and Surface Design in einem Makro nutzen, indem der Anwender einen Spline auswählt und daraufhin das Makro eine vordefinierte Anzahl von Punkten auf dem Spline erzeugt.Allerdings werde ich aus der Aufzeichnung nicht schlau. Dazu kommt, dass viele der Parameter und Formeln nur auf diesem speziellen Fall zutreffen.Ist damit schon mal jemand in Kontakt gekommen und könnte mir etwas helfen?Gruß und Dank
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : 3D Corner erstellen
theshadog am 20.05.2009 um 18:09 Uhr (0)
Nein, wenn sie 1x erzeugt wurden, bleiben die Kurven so. Das Makro endet dann auch.Es geht ja wahrscheinlich um diese 4 Parameter:Code:hybridShapeCorner5.DiscriminationIndex = 1hybridShapeCorner5.BeginOfCorner = 2hybridShapeCorner5.FirstTangentOrientation = 1hybridShapeCorner5.SecondTangentOrientation = -1Allerdings habe ich schon einige Variationen ausprobiert. Und selbst ein Makro, das ich aufgezeichnet habe, dann alle Ecken lösche und das aufgezeichnete Makro drüber laufen lasse funktioniert nicht.Offen ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Dicker Block, Parameter ändern
theshadog am 18.03.2009 um 11:52 Uhr (0)
Hi,also ich erzeuge einen Block, dünn, als neutrale Faser. Mit der Makroaufzeichnung sieht das ganze so aus:Code:Dim pad1 As PadSet pad1 = shapeFactory1.AddNewPad(sketch1, 80.000000)pad1.DirectionOrientation = catInverseOrientationpad1.IsThin = Truepad1.NeutralFiber = TrueDim parameters1 As ParametersSet parameters1 = part1.ParametersDim length1 As ParameterSet length1 = parameters1.Item("Part1HauptkörperBlock.2ThickThin1")length1.Value = 3.000000Jetzt hab ich natürlich ein Problem, wenn die Teilenummer ni ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : 3D Corner erstellen
theshadog am 12.05.2009 um 12:04 Uhr (0)
Hi Leute,und zwar bin ich gerade dabei eine Aneinanderreihung von Splines an ihren Stoßpunkten abzurunden. Allerdings bin ich ratlos. Das Makro bricht an der Stelle ab und sagt mir "das Verfahren update konnte nicht durchgeführt werden". Die betroffene Ecke ist als fehlerhaft markiert.Also wähl ich sie aus, das Einstellungsfenster öffnet sich. Ich klicke OK und es klappt - ohne dass ich irgendwas geändert hab.Also nochmal: Makro erstellt die Ecke - gibt Fehlermeldung aus, weil die Ecke so nicht kreiert wer ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro universal gestallten
theshadog am 22.05.2009 um 09:55 Uhr (0)
Sobald du die Skizze selbst benennst, macht CATIA da keine Nummerierung dran. Erstellst du zB 3 Skizze kannst du sie alle "Skizze" nennen, indem du schreibstCode:Set sketeches1 = ...sketches1.name = "Skizze"Set sketeches2 = ...sketches2.name = "Skizze"Set sketeches3 = ...sketches3.name = "Skizze"Das gleiche kommt dabei raus, wenn du die Skizzen in einer Schleife stehen hast:Code:do while c 4Set sketeches1 = ...sketches1.name = "Skizze"c = c + 1loopHier kommen ebenfalls 3 Skizzen raus, die alle "Skizze" he ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro universal gestallten
theshadog am 19.05.2009 um 11:24 Uhr (0)
Code:Language="VBSCRIPT"Sub CATMain()Dim partDocument1 As DocumentSet partDocument1 = CATIA.ActiveDocumentDim part1 As PartSet part1 = partDocument1.PartDim parameters1 As ParametersSet parameters1 = part1.ParametersDim teilenummer As Stringteilenummer = name.partNumberDim length1 As ParameterSet length1 = parameters1.Item("teilenummerOffset_Bbox_Max_X.6")length1.Value = 1.000000part1.UpdateDim bodies1 As BodiesSet bodies1 = part1.BodiesDim nummer as Integernummer = InputBox("Rohrteilnummer eingeben.", "Ro ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro universal gestallten
theshadog am 20.05.2009 um 18:18 Uhr (0)
Also ich finde das Buch "CATIA V5 Makroprogrammierung mit Visual Basic Script" sehr empfehlenswert. Im "Kochbuch" wird vieles an Beispielen erklärt, was man nicht einfach auf anderes übertragen kann.Zu deinem Problem:Bei den Skizzen kannst du ebenfalls über eine Eingabe arbeiten.Code:Dim zahl as Integerzahl = InputBox("Skizzennummer eingeben.", "Skizzennummer", zahl)Dim sketch1 As SketchSet sketch1 = sketches1.Item("Skizze." & zahl)Eine andere Möglichkeit wäre, dass du eine Selection definierst, damit der ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Länge eines Joins aus Linien messen
theshadog am 16.06.2009 um 11:21 Uhr (0)
Hi,hab folgendes Problem: Ich hab einen Join(Verbindung), in dem lauter Linien und Splines miteinander verknüpft sind. Ich möchte die Länge aller Linien auslesen. Per Hand geht das Super. Aber wo liegt mein Fehler im Makro?Code: LBjoin vermessenDim LBjoin As HybridShapeAssembleSet LBjoin = hybridShapes1.Item("LBJoin")Dim MessRef as ReferenceSet MessRef = part1.CreateReferenceFromObject(LBjoin)Set SPAWb = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench")Set messen = SPAWb.GetMeasurable(MessRef)Dim laenge As ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro universal gestallten
theshadog am 19.05.2009 um 12:32 Uhr (0)
Oh man, ich bin heut weng neben der Kappe.Dim erzeugst du ein neues object/variable/etc. Darum kommt bei dir auch die Fehlermeldung. In Zeile 24 schreibst du "Dim bodies1 As Bodies" und in Zeile 32 schreibst du "Dim bodies1 As Bodies". Du sagst dem Programm also "erzeuge Bodies1 as Bodies" und dann 4 Zeilen später nochmal "erzeuge Bodies1 as Bodies". Aber den gibts ja schon.Hatte bei meinem Zeug auch noch 2 kleine Fehler drin.Im Anhang mal dein Code. Müsste jetzt soweit klappen, allerdings kanns gut sein, ...
|
| In das Form CATIA V5 Programmierung wechseln |
